perm filename INEN[ZZZ,LCS] blob
sn#428444 filedate 1979-05-08 generic text, type T, neo UTF8
INS 3; < INSTRUMENT 3
ENV
;
ENV P4 P5 B2 DP7 DP8 DP9 P10 ;
COS B2 FP3 B2 P6 ;
OUT B2 B1;END;
SEG 2 0 1 1 8 1 10 .2 25 1 50 0 75 0 100; <F2 ENVELOPE
GEN 0 2 4 .5 0 .3 0 .2 0 .1 7; < CLAR WAVE F4
SIN 1 1; <F1 SINE WAVE
SRT←12800;
<ENV 0 .14 A*2 1200 F2 F1 .04 P2*2 .04 0;
<ENV .14 .14 C 1200 F2 F1 .04 P2*2 .04 ,-1;
<ENV .28 .14 D*2 1200 F2 F1 .04 P2*2 .04 0;
<ENV .42 .14 G/2 1200 F2 F1 .04 P2*2 .04 ,-1;
ENV 0 .5 D 2000 F2 F1 .08 1 .08 0;
P10=-1;
ENV .5 .5 F; < P4 to P9 remain the same.
ENV 1 .5 CS 2000 F2 F1 .08 .5 .08 1;
FINI;
< ENVELOPE GENERATOR ENV PorB, ForP, B, P, P, P, P, P;
< AMPL FUNC OUT ATCK STDY DCAY FLAG STOR
< FLAG=1=NO CONTINUATION, REINITS FOR EACH NOTE AND CAN PLAY ON TOP OF SELF.
< FLAG=0=INIT CONTINUATION FOR SEVERAL NOTES UNDER 1 ENV.
< -1=CONTINUATION (USE DIFFERENT INS. NUMS FOR CHORDS!!)
<ENV 0 .14 A*2 1200 F2 F1 .04 P2 .04 1;FINI;